62000 DV=PEEK(186):IFDV<8THENDV=8
62010 PRINT"[147]":POKE53280,0:POKE53281,0:POKE211,0:POKE214,08:SYS58732
62020 A$="[219][219][219][219][219][219][219]"
62030 P$="[208] E R[160]I O D[160]I C  [160][212] A B L E":AU$="[195]AMERON [203]AISER":F$="P TABLE"
62040 PRINT"[176][178][178][178][178][178][178][178][155][178][178][178][178][178][178][178][152][178][178][178][178][178][178][178][178][151][178][178][178][178][178][178][178][178][152][178][178][178][178][178][178][174]
62050 [153]"-(null)(null)(null)(null)(null)(null)LIST"A$"PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"<
62060 PRINT"[171][219][219][219][219][219][155]"A$"[152]"A$"[219][151]"A$"[219][152]"A$"[219][155][179]
62070 [153]"-(null)(null)(null)(null)LIST"A$"PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST(null)<
62080 PRINT"[171][219][219][219][155]"A$"[152]"A$"[219][151]"A$"[219][152]"A$"[219][155][219][219][179]
62090 [153]"-(null)(null)LIST"A$"PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST(null)(null)(null)<
62100 PRINT"[171][219][155]"A$"[152]"A$"[219][151]"A$"[219][152]"A$"[219][155][219][219][219][219][179]
62110 [153]"-LIST"A$"PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST(null)(null)(null)(null)(null)<
62120 PRINT"[155][171][219][219][219][219][219][219][152]"A$"[219][151]"A$"[219][152]"A$"[219][155][219][219][219][219][219][219][179]
62130 [153]"LIST-(null)(null)(null)(null)(null)PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST"A$"<
62140 PRINT"[155][171][219][219][219][219][152]"A$"[219][151]"A$"[219][152]"A$"[219][155]"A$"[219][179]
62150 [153]"LIST-(null)(null)(null)PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST"A$"(null)(null)<
62160 PRINT"[155][171][219][219][152]"A$"[219][151]"A$"[219][152]"A$"[219][155]"A$"[219][219][219][179]
62170 [153]"LIST-(null)PRINT#"A$"(null)POKE"A$"(null)PRINT#"A$"(null)LIST"A$"(null)(null)(null)(null)<
62180 PRINT"[152][171]"A$"[219][151]"A$"[219][152]"A$"[219][155]"A$"[219][219][219][219][219][179]"
62190 PRINT"[152][171]"A$"[151]"A$"[219][152]"A$"[219][155]"A$"[219][219][219][219][219][219][179]"
62200 PRINT"[155][173][177][177][177][177][177][177][151][177][177][177][177][177][177][177][177][152][177][177][177][177][177][177][177][177][155][177][177][177][177][177][177][177][177][177][177][177][177][177][177][189]"
62210 POKE211,0:POKE214,10:SYS58732:X=2:GOSUB62230:GOSUB62280
62220 POKE211,0:POKE214,15:SYS58732:X=5:GOSUB62230:GOTO62300
62230 GOSUB62260:PRINT"[171][219][219][177][177][177][155][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][177][155]
62240 [129]I[178]1[164]X:[141]62260:[153]"-(null)<OPEN                                WAITPOKE-":[130]
62250 [141]62260:[153]"-(null)(null)POKE================================(null)":[142]
62260 [151]646,1:[139]X[177]2[167][151]646,15
62270 [142]
62280 [151]214,11:[151]211,20[171][195](P$)[173]2:[158]58732:[153]"OPEN"P$
62290 [153][166]20[171][195](AU$)[173]2)""AU$:[142]
62300 [151]214,15:[151]211,0:[158]58732:
62310 [153]"OPEN(LEN) 1996 MID$ & ASC (null)UBLISHING, RIGHT$NC.
62320 PRINT"[159][212]HIS IS THE COPYRIGHTED WORK OF
62330 [153]"OPENMID$ & ASC (null)UBLISHING, RIGHT$NC. RIGHT$T IS NOT
62340 PRINT"[159]SHAREWARE OR PUBLIC DOMAIN.
62350 [153]"OPEN1-800-594-3370 OR 1-318-221-8718
62360 FORI=DVTODV:CLOSE2:OPEN2,I,2:CLOSE2:IFSTTHEN62380
62370 CLOSE15:OPEN15,I,15,"R0:"+F$+"="+F$:INPUT#15,ER:CLOSE15:IFER=63THEN62390
62380 NEXT:PRINT""F$" NOT FOUND!":POKE186,8:END
62390 Q$=CHR$(34):POKE646,PEEK(53281):PRINT"";
62400 PRINT"P[207]2048,0:P[207]44,8:P[207]43,1:P[207]56,160:P[207]55,0:CLR:L[207]"Q$F$Q$","I
62410 PRINT"R[213]:";:POKE631,13:POKE632,145:POKE633,145:POKE634,145
62420 POKE635,145:POKE636,13:POKE198,6